home *** CD-ROM | disk | FTP | other *** search
/ National Lampoon's Blind Date / National Lampoon's Blind Date.iso / bd / clues1.mmm / 00037_Script_37 < prev    next >
Text File  |  1995-03-01  |  3KB  |  90 lines

  1. on waitMovieOrPressed chan
  2.   repeat while the movieRate of sprite chan > 0
  3.     updateStage
  4.     if mouseDown() then
  5.       set the movieRate of sprite chan = 0
  6.       doLastFrame()
  7.       exit repeat
  8.     end if
  9.   end repeat
  10. end waitMovieOrPressed
  11. ---------------------------------------------------
  12. on doLastFrame
  13.   global returnFrame, returnMovie, nextTextClue
  14.   
  15.   -- only wait if there is a text clue
  16.   if nextTextClue > 0 then
  17.     repeat while not mouseDown()
  18.     end repeat
  19.   end if
  20.   -- wait until they release the mouse
  21.   repeat while mouseDown()
  22.     nothing  
  23.   end repeat
  24.   when mouseUp then dontPassEvent
  25.   go to frame returnFrame of movie returnMovie
  26. end doLastFrame
  27. ---------------------------------------------------
  28. on getClue
  29.   global hintReturn, nextTextClue, Drinks
  30.   
  31.   if nextTextClue < 1 or nextTextClue > 2 then
  32.     set nextTextClue = 1
  33.   end if
  34.   if hintReturn >= "s01" and hintReturn <= "s13" then
  35.     set nextTextClue = 1
  36.     setClueText("s01-13")
  37.   else if hintReturn = "s41" or¼
  38.    (hintReturn >= "s44" and hintReturn <= "s51") then
  39.     if nextTextClue = 1 then
  40.       set nextTextClue = 2
  41.       setClueText("s41-51")
  42.     else
  43.       set nextTextClue = 1
  44.       setClueText("s41-51b")
  45.     end if
  46.   else if (hintReturn >= "s28" and hintReturn <= "s39") or¼
  47.    (hintReturn >= "s16" and hintReturn <= "s27") then
  48.     set nextTextClue = 1
  49.     setClueText("s16-39")
  50.   else if hintReturn >= "s55" and hintReturn <= "s62" then
  51.     if nextTextClue = 1 then
  52.       set nextTextClue = 2
  53.       setClueText("s55-62")
  54.     else
  55.       set nextTextClue = 1
  56.       setClueText("s55-62b")
  57.     end if
  58.   else if hintReturn >= "s63" and hintReturn <= "s67" then
  59.     set nextTextClue = 1
  60.     setClueText("s63-67")  
  61.   else if hintReturn >= "s84" and hintReturn <= "s92" then
  62.     if nextTextClue = 1 then
  63.       set nextTextClue = 2
  64.       setClueText("s84-92")
  65.     else
  66.       set nextTextClue = 1
  67.       setClueText("s84-92b")
  68.     end if
  69.   else if hintReturn >= "s93" and hintReturn <= "s98" then
  70.     set nextTextClue = 1
  71.     setClueText("s93-98")  
  72.   else if hintReturn >= "s77" and hintReturn <= "s83" then
  73.     if nextTextClue = 1 and Drinks < 3 then
  74.       set nextTextClue = 2
  75.       setClueText("s77-83")
  76.     else
  77.       set nextTextClue = 1
  78.       setClueText("s77-83b")
  79.     end if
  80.   else
  81.     set nextTextClue = 0
  82.   end if
  83. end getClue
  84. ---------------------------------------------------
  85. on setClueText clueCastName
  86.   puppetSprite 10, TRUE
  87.   set the castNum of sprite 10 to the number of cast clueCastName
  88.   updateStage
  89. end setClueText
  90.